home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / DJGPP / CBGRX103.ZIP / contrib / libgrx / test / hitest.c < prev    next >
Text File  |  1993-12-06  |  1KB  |  70 lines

  1. #include <grx.h>
  2.  
  3. #define PIXW    3
  4. #define PIXH    4
  5.  
  6. #define BLUE    1
  7. #define GREEN    32
  8. #define RED    1024
  9.  
  10. #define LEVELS  32
  11.  
  12. #define ROWS    4
  13. #define COLS    8
  14.  
  15. #define BOXW    (LEVELS*PIXW)
  16. #define BOXH    (LEVELS*PIXH)
  17.  
  18. #define GAPX    ((800 - BOXW*COLS) / COLS)
  19. #define GAPY    ((600 - BOXH*ROWS) / ROWS)
  20.  
  21.  
  22. void drawbox(int x,int y,int base)
  23. {
  24.     int xx,ii,jj;
  25.  
  26.     for(ii = 0; ii < LEVELS; ii++,y += PIXH) {
  27.         for(jj = 0,xx = x; jj < LEVELS; jj++,xx += PIXW) {
  28.         GrFilledBox(xx,y,xx+PIXW-1,y+PIXH-1,base+ii*GREEN+jj*BLUE);
  29.         }
  30.     }
  31. }
  32.  
  33. void drawrow(int x,int y,int base)
  34. {
  35.     int ii;
  36.  
  37.     for(ii = 0; ii < COLS; ii++,x += (BOXW+GAPX)) {
  38.         drawbox(x,y,base+RED*ii);
  39.     }
  40. }
  41.  
  42. void main(void)
  43. {
  44.     int x,y,ii;
  45.  
  46.     GrSetMode(GR_width_height_color_graphics,800,600,32768);
  47.     if((GrNumColors() == 32768) && (GrSizeX() == 800) && (GrSizeY() == 600)) {
  48.         x = GAPX / 2;
  49.         y = GAPY / 2;
  50.         for(ii = 0; ii < ROWS; ii++) {
  51.         drawrow(x,y,ii*RED*COLS);
  52.         y += (BOXH + GAPY);
  53.         }
  54.         getkey();
  55.     }
  56.     GrClearScreen(GrBlack());
  57.     if((GrNumColors() == 32768) && (GrSizeX() == 800) && (GrSizeY() == 600)) {
  58.         x = GAPX / 2;
  59.         y = GAPY / 2;
  60.         for(ii = 0; ii < ROWS; ii++) {
  61.         drawrow(x,y,ii*RED*COLS);
  62.         y += (BOXH + GAPY);
  63.         }
  64.         getkey();
  65.     }
  66.     GrSetMode(GR_default_text);
  67.     exit(0);
  68. }
  69.  
  70.